home *** CD-ROM | disk | FTP | other *** search
/ Software of the Month Club 1996 September / Software of the Month Club 1996 September.iso / mac / Software Research Institute-SRI / Business / Alpha ƒ / Tcl / SystemCode / clickWarrior.tcl < prev    next >
Encoding:
Text File  |  1995-11-16  |  162 b   |  10 lines  |  [TEXT/ALFA]
  1.  
  2. eventHandler ALFA CWOF clickHandler
  3.  
  4. proc clickHandler {msg} {
  5.     global HOME dum
  6.     if {[regexp {╥(.*)╙} $msg dummy fname]} {
  7.         edit "$HOME:EditSource:$fname"
  8.     }
  9. }
  10.